home *** CD-ROM | disk | FTP | other *** search
/ The Trig Explorer / The Trig Explorer.iso / pc / explorer / wave.dxr / 00002.ls < prev    next >
Encoding:
Text File  |  1997-07-22  |  367 b   |  14 lines

  1. on startMovie
  2.   cursor(-1)
  3.   set the keyDownScript to "printPass"
  4. end
  5.  
  6. on numsOnly
  7.   if (the key = RETURN) or (the key = RETURN) or (the keyCode = 76) then
  8.     dontPassEvent()
  9.   end if
  10.   if ((the key < "0") or (the key > "9")) and (the key <> "-") and (the key <> ".") and (the key <> numToChar(9)) and (the key <> numToChar(8)) then
  11.     dontPassEvent()
  12.   end if
  13. end
  14.